Developer CD Series 2000 November: Tool Chest/Dev.CD Nov 00 TC Disk 1.toast/What's New?/Development Kits/Mac OS/Installer SDK 1.2.4/Installer 4.0.8/Installer 4.0.8 Examples/• Some Useful Utilities/Set Dir to Active

Text File | 2000-10-04 | 210 b | 10 lines | [TEXT/MPS ]

# DirActive        Andrew Shebanow        12/4/88
#
# This simplistic little script gets the name of the active window,
# and sets the directory to its folder.

Set Exit 0
If "{Active}" =~ /(≈)®1:≈/
    Directory "{®1}:"
End